ELSECALLEOF<0x20><0x20>CHR$ELSENEXTLETLENLETWENDLENLETSQRLETSQRSINWENDSINVALSINWENDSQRSINWENDNEXT <0x7e><0x20>< <0x9e,0x00><0x20>STR$SQR<0x7e>STR$47305STR$<0x49><0x49>STR$<0x49>STR$<0x49><0x49>STR$STR$EOFSTR$<0x7d>EOFvarffffb78e< labelffffa0a0CALL<0x174670a>CDBLCHR$WRITEELSEIF<0x52><0x52><0x7d>><0x9e,0x00><0x1746715>>><0x51>\><0x4d>WRITESPACE$WENDSQRLEN<0x20><0x20>ELSE< 142EOFCHR$~<0x52>ELSEIF~9k4GAREA<0x4d>STATIC<0x49><0x7d><0x7c><0x7f>&Hb9a1CLNG\\<0x4d><0x4d>AREASQRWRITESQREOF<0x20>< 0<0x20>ELSECHR$EOF<0x52><0x52>j40<0x1746753><0x1746754>fSGNRNDRND<0x50>'<0x7f><0x174675c>''<0x7f>FN&H56b6><0x52><0x49><0x7e>SQRlabelffff8eb7LINE< <0x174676f>CALL<0x20>\<0x20>><0x20><0x1746776>&Ha05<0x174677a>MID$<0x7e>TANlabel0000 <0x7e><0x7d>&Ha188<0x17467b7>E<0x48>>><0x52>WRITE<0x3b>SQRSQREOF< -2.43122e-19>ELSEIF4<0x17467cc>&Ha0akSGNTANTANSTATIC\<0x7f><0x7d><0x7d><0x7f>FNCOMMON&Hc89<0x49>\<0x4d><0x52><0x7e>WRITE CHR$< !CHR$LINE\<0x20>>LINE44<0x17467f2><0x17467f3><0x17467f4>SGNSPACE$RNDRNDSTATIC<0x7f><0x7f>STATIC<0x7d><0x7d>FNCOMMONE<0x1746802><0x1746803>G<0x3b>><0x52>WRITENEXTSQRWEND< !<0x20>EOFCHR$<0x20>>WEND44&Ha0dIFSGNTANTANSTATIC<0x7d><0x7f><0x7f>STATIC<0x7d>STRING$COMMONE&H40df<0x49><0x52>SQRWRITESQRWENDXOR <0xfd,0x00><0x1746835>CHR$EOFCHR$WRITE>CDBL<0x7e><0x174683d><0x174683e><0x174683f><0x1746840>IFSINMID$SGN<0x49>>\'<0x49>'Y2<0x7e>&H704<0x1746851>WRITE<0x51>MKL$WRITENEXTSQR< !CALLEOF_LINE><0x20>44&H60dIFAREA<0x50><0x50>USING-<0x7f><0x7d>USING<0x7f>RIGHT$COMMONEE<0x1746874><0x1746875><0x1746876>WRITE>NEXTWRITESQRLINE< <0x174687f><0x20><0x20>CHR$ELSE>LEN<0x1746886>9<0x1746888><0x1746889><0x174688a>4QHkGGk|G|G4<0x1746897>&Hd0d<0x174689b><0x174689c>ELSEIF<0x52>WRITESINNEXTLINE< <0x17468a5><0x20>EOF^WRITE>EOF<0xfd,0x00> E<0x17468e3>ECOMMONEE<0x7e>&H90d&H507WRITE<0x51>WRITEWRITENEXTSQR< <0x17468f7>CHR$<0x20>q<0x20>>CHR$<0x2e,0x00><0x1746900><0x1746901><0x1746902><0x1746903><0x1746904>!<0x7e><0x1746907>var0a06<0x174690b><0x174690c><0x174690d><0x174690e> WRITE<0x52> NEXT< <0x1746985><0x20>LEN^<0x20>>ELSE<0x174698c>4<0x7c><0x174698f>3<0x1746991><0x1746992>&Ha0d&Hd0c<0x1746999>&Ha0d<0x174699d><0x174699e><0x174699f>ELSEIF<0x52>NEXTWRITENEXTLINE< <0x17469a8>CHR$LEN<0x20>WEND>LINE<0x17469af>4<0xbd,0xfffffffb> <0x17469b4><0x7c><0x17469b6>label070d<0x17469ba><0x7e><0x17469bc><0x17469bd><0x17469be><0x17469bf>WRITE<0x52>SINWRITESQRLET<0x7e> * WRITE>q<0x17469d1><0x17469d2>&Hfd0d<0x17469d6>&Hd0d<0x17469da><0x17469db><0x17469dc>4<0x17469de><0x17469df><0x17469e0><0x17469e1><0x17469e2><0x17469e3>!<0x17469e5><0x4d><0x52><0x7e>WRITE SQR< WRITE>LINE<0x17469f5><0x17469f6>&Hfd0d<0x17469fc>&H7f9<0x1746a00>WRITE<0x52>SINWENDWRITECHR$/ <0x7d> <0x20>>LEN<0x1746a16>4<0x1746a18><0x7d><0x1746a1a>var0a0d<0x7d><0x1746a1f><0xbd,0xfffffffb><0x4d><0x52>WRITEWENDNEXTSQR< <0x1746a2e>CALLCHR$_LET>WRITE4MOD<0x1746a37> <0x1746a39><0xbd,0xfffffffb>1<0x1746a3d> <0x52>SINWRITE LENCHR$CHR$<0x20><0x20>LINE<0x20>CHR$<0x20>IMP WRITE>ABS<0x1746ac4><0x1746ac5>&Hff0d<0x9d,0x00>var070a<0x7c><0x1746acf><0x1746ad0>4<0x1746ad2>!4<0x4d><0x52>SQRWENDSQRSQRLENSQR<0x7e><0x20><0x1746adf>EOFEOFELSEEOF<0x20>IMP EOF>ELSEIF4<0x1746aef><0x1746af0><0x9d,0xfffffffb> <0x1746af4><0x9d,0xfffffffb><0x1746af7>!<0x1746af9>WRITE<0x52>SINWRITEWENDWEND<0x7e>LINE<0x1746b02>LEN<0x20><0x20>LINE<0x20>ELSE<0x20>IMP <0x1746b0c>CHR$EOFCHR$LINE>CHR$<0x7e><0x1746b14> <0x1746b16><0x7c><0x1746b18>var0707<0x9d,0x00>'<0x1746b1f><0x1746b20><0x52><0x52>SINWENDWRITECHR$LINELINE<0x20><0x20>LINE<0x20>LINE<0x20>LENCALL<0x20><0x20>CALLEOFCALLELSEELSECALLCHR$<0x20>EOFELSECALLCHR$ABSELSE>WEND44<0x1746b45><0x1746b46><0x9d,0xfffffffb><0x1746b4b><0x1746b4c><0x1746b4d> <0x1746b82><0x1746b83><0x1746b84>WRITE<0x52>NEXTWENDSQRLINELINE <0x20>EOFLINE<0x20><0x20>LINECHR$CHR$CALLCHR$CALLELSEELSE<0x20><0x20>CHR$<0x20>ELSECALLEOFq<0x20>><0x20><0x1746bda><0x1746bdb>&Hf80d <0x1746be0><0x9d,0xfffffffb><0x49><0x4d>WRITEWRITESQRSQR<0x7d>LINElabelffffa09fWEND<0x7e><0x20>5CALLEOFCVIEOF<0x20>ELSECHR$<0x20>EOFCVIELSEELSE<0x20>LINE^LINE>ELSEIF4&Ha04!<0x7e><0x1746c0e> <0x1746c10><0x7d><0x1746c12>7!<0x1746c15><0x1746c16>&Hc04<0x1746c1a>!<0x1746c1c>WRITE<0x51>SINWRITEWRITEWENDEOFEOF<0x20>EOFCALLEOF<0x20>CVI<0x20>CHR$CALLELSE<0x20>EOF<0x20>CALLCHR$CHR$LINECALLELSE<0x20>tEOF^CHR$>WRITE<0x1746c3f><0x1746c40><0x1746c41><0x1746c42><0x1746c43><0x1746c44>&Ha0a<0x1746c48><0x1746c49><0x1746c4a><0x1746c4b><0x7c><0x1746c4d>75<0x1746c50><0x1746c51>4<0x52>ELSEIFNEXTWRITEELSEIFWENDWENDWRITELETWRITELET CHR$LINECALLABS<0x20>CHR$LET<0x7e>WENDLETWENDLET<0x7d>LET<0x1746ca2>ELSEIFELSEIFLETGOTOWHILE<0x4d>WHILEWHILEUSING -PTAB9USINGUSING<0x7f><0x7f>-VALkINPUTWRITEABS~~<0x20>ELSE~_WENDCVI<0x20>EOF<0x20>EOFRaRqa<0x7e><0x20><0x1746cd1>RkEOFEOFCDBLSQR<0x51>>><0x51>\<0x7f><0x7e>>3<0x7f>-REM鰦jYj2jkkQ4t !!QH~ҙQ~G !MHE!.f.EffG QýR G  4j EOF2&Hc054SQRSQRk2&Hca9WRITE<0x1746d90>4j<0x1746d93>4j<0x1746d96>4IF<0x1746d99><0x1746d9a>9SQRLINE_CALLWRITE<0x52>3403^<0x1746da6>597744!<0x1746dac>NEXT4<0x1746daf>lWEND<0x1746db2><0x1746db3>GINKEY$WENDLETDATAWRITE<0x52>ABS464<0x1746dbf>4<0x52>>Q4H<0x52>ELSEIF~49QQGOTOWRITE6G5<0x1746dd2>6GOTOWRITEWRITECHR$ABSWRITE<0x52>4<0x1746ddc>LENR<0x1746ddf>53886<0x1746de3><0x1746de4>4WEND4<0x1746de8>Ql<0x1746deb><0x1746dec>HWRITELINE<0x3b>CHR$ELSEIF<0x52>949G<0x1746df8>9><0x52>G<0x1746dfd>Q\WRITE44G~<0x52>ELSEIF444<0x1746e0a>G<0x20>WRITE <0x20><0x52>?<0x1746e45>99<0x1746e48>H<0x52>Q4<0x1746e4d>4k33414<0x1746e54>!9SINVALSQRDATAWRITE<0x52>~<0x1746e5e>9~<0x1746e61><0x1746e62>WRITE>l<0x1746e66>4ELSEIF>k<0x1746e6b>&H36d2>l4<0x1746e72><0x1746e73>~WENDWRITEWENDCALL~ABSWRITE<0x52>(4<0x1746e7f><0x1746e80><0x1746e81>LETWRITE<0x1746e84>9H4Q9<0x1746e8a>4<0x1746e8c>!<0x1746e8e>GCHR$LENNEXTLINEELSEIF<0x52>l<0x1746e97>9IF<0x1746e9a>4<0x52><0x52>444ELSEIF<0x51>~4<0x1746ea5>6WRITEWRITE6<0x1746eaa><0x1746eab>4INPUTWRITEWENDWENDCALLABS<0x20>>J4<0x1746eb7>!<0x1746eb9>WRITE>440<0x1746ebf>04<0x1746ec2>4 9NEXTWENDINPUTLETWEND<0x52>CHR$<0x1746efa>5 WRITE>Q<0x1746f35>4INPUTELSEIFWRITELETQ 604<0x1746f75>6INPUTSQRWEND<0x20>\WRITE<0x52>(44<0x1746f81><0x1746f82>WRITESQR44<0x1746f87><0x1746f88> <0x1746fc2>9l4<0x1746fc6>HWRITELETNEXTLETWRITE<0x52>R49k<0x1746fd2>4<0x52><0x52>k<0x1746fd7>6<0x52>WENDLENLENk<0x1746fde>4LEN4G9<0x1746fe4>9~WRITEWENDCHR$CHR$<0x20><0x52>~41025364<0x1746ff4>4LENQ4<0x1746ff9><0x1746ffa>GELSEIFQ<0x1746ffe>4LETNEXTSQRLENWRITE<0x51>LEN49<0x1747009><0x174700a>Q<0x52>ELSEIFk40LET<0x52>44k4GINPUT94INPUTG<0x174701d>kSINWENDCHR$CALLWRITE<0x52>1900l05<0x174702b><0x174702c>5\LET9<0x1747031>!~ELSEIF4<0x1747036>4SQRLINE~CHR$ELSEIF ~<0x1747073><0x1747074><0x1747075>IF<0x52>IF2<0x174707a><0x174707b>kWRITE.40<0x1747081>Gk<0x1747084>0IF4<0x1747088>HWRITELINECALLELSEWRITEWRITE4<0x1747091>4SQRk<0x1747095><0x1747096><0x1747097>4\WRITE0<0x174709c>!k>G<0x17470a1>4SINSQRINPUTLET<0x52> &H547>WRITEH.0<0x17470da><0x17470db>SPACE$MKL$|<0x17470df>4<0x3b>IF9GINPUTQGlWRITEWENDt<0x20>ELSEIFELSE4<0x17470f0>6ELSEIFGOTO4<0x17470f5><0x17470f6>l>WENDj4<0x17470fc>kELSEIFk4oLINELINEEOFLINEELSEIFCHR$9G5502ELSEIFWRITE9G18513WENDWEND <0x1747142>LINEINPUT32445CDBLRELSEWEND<0x20>CHR$CHR$uEOFuCHR$ELSE<0x20>EOF<0x20>EOFEOF<0x20>EOF<0x20>EOF<0x20>EOF<0x45,0x00><0x1747161>CVICHR$<0x20><0x20>EOF<0x7e>WRITE<0x7e><0x20>&HbfbfSQRWRITEWRITE<0x20><0x20>SQR<0x20>WRITE<0x20>WRITESQR<0x7e><0x20>" LINELET<0x20>LINE<0x20>WENDLINE<0x20>WEND<0x20>LINELINE<0x20>LETELSELINECHR$ELSEABS<0x20><0x20>CVI<0x7e><0x20>labelffff8e83WRITE<0x7d><0x20> WEND<0x7c><0x20><0x17471d4>LET<0x20>LINEWENDLINECALLWEND<0x20><0x7c> <0x9c,0x00><0x17471e1>CHR$CVICHR$CALLEOFCALLELSECHR$CALLEOFASCELSE<0x20>CALLLETLETELSE<0x7d>LET<0x17471f5>LINELETCHR$LET<0x20>CALLLETELSELET<0x20>EOFCALLEOFCALL<0x7e><0x20><0x1747206>EOF<0x20><0x20>CHR$ELSEEOFCALLMOD 3CALLCVIEOFCALLCHR$CALLELSEELSECALLEOFCVIEOFCALLCVIEOFCVICHR$CHR$EOFEOFCVI<0x7e><0x20><0x1747228>CVICVIEOFCALL<0x20><0x20>CHR$EOF<0x20>LEN<0x20>ELSE<0x7e><0x20>^ <0x20>EOFCHR$EOFEOF<0x20><0x1747243>SQRWENDELSEIFELSEIFWRITE<0x51>ELSEIF<0x52>ELSEIF WRITEELSEIF<0x7c>WRITE SQR<0x7e>WRITE<0x174728a>SQREOFLENSQRSQR<0x20>EOF^ 128<0x20>ABSCALLELSE<0x20>WRITEABSq~ABSABS~ABS~J<0x7d>~1\lJ9~ll5QINPUTELSEIFWRITEWENDSQRLINE<0x20>CHR$<0x20>WEND^ 3<0x20>ELSECDBLWRITEWRITE>>G<0x17472c6><0x17472c7><0x17472c8><0x17472c9><0x17472ca><0x17472cb>!<0x17472cd><0x17472ce>!<0x17472d0><0x17472d1><0x17472d2><0x7e><0x17472d4><0x7c><0x17472d6>var7cd1<0x7e>><0x17472dc><0x49>SQRWRITELINESQR^ &H8e85CHR$<0x20>ELSEIF<0x52>>G<0x17472ed><0x17472ee><0x17472ef><0x17472f0><0x17472f1>AND<0x17472f3>varffff89cd<0x7e>><0x17472f9>WRITESQRSQR<0x20>EOF^ &CHR$CHR$EOFWRITEELSEIF>>j&Ha0c<0x174730d><0x174730e><0x174730f>0<0x1747311><0x1747312><0x1747313><0x1747314><0x1747315>2244244&H46b>WRITE<0x52>>WRITENEXTWRITESQRSQR^ #CHR$LINECHR$ELSEIFELSEIF>>G<0x1747334><0x1747335><0x1747336><0x1747337><0x1747338>9Glk~kGQLSETGOTOLSETIFGOTOMKL$H<0x1747348>GOTO>WRITE<0x4d>>WRITEWRITE<0x7e>&qCHR$EOFWRITEELSEIF>\IF..0<0x174738e><0x174738f>FOR<0x51>LSETAREA<0x7f>SGNESGN<0x49>SPACE$<0x49>SGNIF>SIN2GOTO>WRITE>>WRITEWRITESPACE$LINESQROR <0x17473ac> <0x20>CHR$LINEELSEIFELSEIF<0x52>\<0x3b>GCOS<0x7e>08jSQR44WENDH<0x17473c2>6SIN{SINk<0x17473c8>IFWENDGl<0x52>><0x52>>SQRSTR$SQRSQRSTR$^ -1.23782e-35ELSEIF<0x52>>WRITEQ|QHMQWRITEHM<0x4d>IF<0x17473ec>GIFQSQRH<0x17473f2>GINPUTMIF<0x7d>><0x17473f9><0x4d>WRITESQRLINESQR^ WRITEELSEIF<0x52>\>k<0x7e>G 040MKL$SQR.VAL<0x52><0x1747416>GLSETGSINIF<0x174741c><0x174741d>IFGH<0x51>><0x51>>WRITE<0x7e>SQR <0x3b>^ &q<0x20>EOFELSEIFELSEIF<0x52>><0x52>|COS|fCOS&Ha598&H7c98GIF|0SPACE$k<0x1747446>GOTOWRITE.LSET<0x4d><0x51>>><0x49>WRITEWRITESQRSQR^ <0x1747456>ELSEqCHR$WRITEELSEIF<0x52>>>LSETFORzLSETLSET.H<0x4d>|HSGNLSETVAL|<0x174746d>LSET SQRlabel306b<0x52><0x7e>>varffffc0c9<0x7e>SQR^ &CHR$CHR$EOFWRITE<0x52><0x52>><0x52>RND<0x45>RND<0x45>REMVYj ~G l >WRITEWRITENEXTWENDSQR^ <0x20>ELSEIF<0x52>>>AREA<0x7e>CLNG9USINGTOFIELDFORUSINGUSING<0x51><0x7f><0x7f>FOR4LSETSINHz4!G<0x4d>>>\<0x4d>WRITEWRITESQRNEXT<0x7d> EQV labelffff858eCHR$<0x7e>ELSEIFlabelffffe9cdAREA<0x7e><0x50>9USINGSTATICFIELDCVS'SGNSIN<0x7f><0x4d><0x174754c>4INPUTIF<0x1747550>&H21056<0x51><0x51>>>ELSEIFWRITESQRLENSQR^ &CALLCHR$ELSEWRITEELSEIF<0x52>>><0x49><0x49><0x48><0x48>>>VY<0x49>SPACE$COS><0x52>2&H98bb0<0x174757b><0x174757c><0x174757d>4<0x4d><0x51>>><0x4d>WRITEWRITESQRSQR^ varffffa08536799<0x52>ELSEIF<0x52><0x52>WRITEMKL$MKL$AREA<0x4d><0x4d>z{<0x4d>H4WRITEGOTO<0x17475a1><0x17475a2>SINLSET<0x17475a5><0x17475a6><0x17475a7>!H<0x52><0x7e>><0x17475ad>ELSEIFSQRSPACE$SQR<0x3b>^ <0x17475b5><0x20><0x20>CDBLWRITEELSEIF<0x7e><0x52>3384195254SGNELSEIFRNDY<0x17475c6>j&H98bb<0x17475cb> 4<0x1747603><0x1747604><0x1747605>4WRITE<0x51><0x52>>WRITEWRITESQRLENSQR^ <0x1747612>LET<0x20>ABSWRITEELSEIFELSEIF<0x52><0x52>ELSEIF<0x49><0x52><0x51>>\<0x51>~MKL$4GOTO<0x1747626>SINGOTO<0x1747629>4<0x49>>IF0&H2134<0x52><0x51>>>WRITEWRITESQRSQR<0x3b>^ &CHR$CHR$CDBLWRITEELSEIF<0x52><0x52>>WRITE<0x3b><0x3b>IFEOFWRITEIFjkk<0x1747650>ko<0x1747653>4INPUTNEXTk0<0x1747659>!9<0x4d><0x51>>><0x52><0x49>SPACE$SQRSQR^ <0x1747667><0x20>CHR$CHR$WRITEELSEIFELSEIF><0x7f>SINE<0x1747672>XOR<0x1747674><0x1747675><0x1747676><0x1747677><0x1747678><0x1747679><0x50>\><0x174767d>>><0x52>WRITEWRITESQRSTR$^ <0x1747687>CALLELSECHR$WRITEELSEIFELSEIF>\SGNE&H4fe<0x1747695><0x7e> &Hd0c<0x17476c5><0x17476c6>E<0x17476c8><0x17476c9><0x17476ca>.WRITE<0x51><0x51>> <0x7e>SQR^ &H8e83ABSWRITEELSEIFELSEIF<0x52>>><0x51>-\\+<0x7f><0x1747716><0x4d><0x49><0x49>NEXTSQR<0xcb,0x00><0xcb,0x01><0x7e>CHR$<0x52><0x51><0x52>>>\^<0x7f> \<0x7d>><0x1747732><0x51><0x49>STR$SQRSQR^ 0CVICHR$CHR$WRITEELSEIF<0x52><0x52><0x51><0x51>>\>LSETGOTOGOTOi{h<0x7d>y<0x174774f>hh49105--USING-<0x7f>\<0x4d><0x49>AREASQRSTR$^ <0x1747763>ELSECALLCDBLWRITEELSEIFELSEIF<0x174776a><0x52><0x51><0x51><0x7f><0x7f>'COSE&H404<0x1747776><0x7c><0x1747778><0x1747779>&H40cAREA<0x52><0x51><0x7d>><0x1747782>\<0x49><0x49>WRITESQRSQR^ <0x20>ABS<0x20><0x7e>ELSEIF3<0x52>>\>G&H793MCOMMON<0x174779d><0x174779e>!!<0x17477a1>!!<0x17477a4><0x17477a5><0x17477a6>MKL$<0x7e>><0x17477aa>->\<0x4d>AREA<0x49>WRITE<0x3b>^ 3<0x20>CHR$LENWRITEELSEIFELSEIF<0x51><0x51>><0x7f><0x51>E!G\<0x52>k<0x17477c7><0x17477c8>&H711 <0x1747802><0x1747803><0x1747804> <0x51>->><0x4d>WRITE<0x49>SQRSQR^ &<0x20>CHR$CHR$WRITEELSEIF<0x52><0x52>WRITE>\>E!<0x174785b>\<0x7f>SIN0<0x1747860>&Hd0c<0x1747864>&H721<0x1747868>WRITE><0x51>>->><0x51><0x49>WRITESQRSTR$^ 1602585791ELSEIFELSEIF<0x52><0x52>><0x7f><0x52>E<0x1747884>H<0x7f>\FOR0<0x174788a><0x174788b><0x174788c><0x174788d><0x174788e><0x174788f><0x1747890><0x1747891><0x1747892>WRITE><0x52><0x51><0x7e>>varffffc9b7labelffffc9b7SQR^ 0CALLCHR$q<0x20>ELSEIFELSEIF<0x52><0x4d>><0x7f>>G!<0x17478b0><0x7f>\SIN4<0x7e><0x17478b6><0x17478b7><0x17478b8><0x17478b9><0x17478ba><0x17478bb><0x17478bc><0x17478bd>GOTO\<0x7e><0x51><0x17478c2>>\<0x4d><0x49>WRITESQRNEXT^ -1.23716e-35ELSEIF<0x52>ELSEIF<0x52>><0x7f><0x52>E<0x17478d9>4<0x7f><0x7f>IF0<0x17478df>&Hd0a<0x17478e3><0x17478e4><0x17478e5>!<0x17478e7>ELSEIF><0x51><0x7d>><0x17478ed><0x49>SQRSPACE$SQRSTR$IMP <0x7c> 4CVICHR$CHR$<0x20>WRITEWRITEELSEIFELSEIF<0x52>>>0<0x1747904><0x1747905>INPUTWRITEH4<0x174790a><0x174790b><0x174790c><0x174790d><0x7e><0x174790f><0x1747910>!<0x1747912>SIN><0x51><0x52>><0x52><0x52>ELSEIFSQRSQREOFEOF^ <0x1747921><0x20>CALLq<0x20>ELSEIFELSEIF <0x7f>>COS!&H450c<0x1747959><0xd0,0xfffffffb>4<0x174795e><0x174795f><0x1747960>WRITE\<0x4d>>\>>AREAWRITE<0x49>NEXTNEXT^ CHR$CHR$CALL<0x7d><0x20>varffffbfe94923399<0x174797e><0x174797f>459920789Q59HVALELSEIFVALELSEIFWRITELET<0x20>LINEEOFCHR$<0x20>EOF^ !ELSE<0x20>EOFCVIEOF<0x20><0x20>SQR<0x20>ELSEIFSQR<0x17479a5>k<0x17479a7>IFIFMID$SGNAREA<0x49>''STATIC''AREA<0x49><0x49>WRITEWRITESQRSPACE$SQRSTR$<0x7e>SQRvarffffa08f^ 7tCHR$<0x20>CALLEOFCHR$EOFqABSCDBL<0x20><0x52>R4~ELSEIF~5l55<0x17479d9><0x17479da>5LEN<0x17479dd>WRITEWRITE<0x20>SQRCHR$WEND<0x7e>LINE<0x17479e6>ELSECHR$<0x20>ELSE<0x20>^ &CHR$CALLCDBLCALLEOFtCHR$EOF^CDBL<0x20><0x52>*<0x17479fc>9WRITE4<0x1747a00>G&Ha04<0x1747a05><0x1747a06>kINPUT<0x3b>WRITESQRLINEEOFCDBLCHR$EOFCHR$EOFCHR$CVIEOF^ '<0x20>CALLCHR$<0x20>ELSECALL<0x20>ABS <0x52>1564ELSEIF4<0x1747a58>R6<0x1747a5b>l6<0x1747a5e>4LINEINPUTLINENEXTCHR$LINELINECHR$<0x20><0x20>ELSELINELET<0x20> AND &CHR$CVIEOFCALLEOF<0x20>CHR$ELSEuCDBL<0x20>ELSEIF9<0x1747a7f>*<0x52>4<0x1747a83>~~<0x1747a86>~~<0x1747a89>4CHR$SQRDATALINECHR$<0x20><0x20>CALLEOF<0x20>CHR$EOFCHR$CDBL^ <0x1747a9b>CHR$tELSECVIEOF<0x7d>CHR$1.8997e+30<0x1747aa8>9WEND4<0x1747aac>~k<0x1747aaf>G6&H169a<0x3b>LINEWRITELINE<0x20>CHR$CALLLINE<0x20><0x20>ELSE<0x20><0x20>AND ' CALLCHR$ELSECALLCHR$<0x20>CALLABSCALL (<0x1747b03>4ABS4<0x1747b07>~l44<0x1747b0c><0x1747b0d>4ABSLENLINELINECHR$<0x20>WENDCHR$EOFCALLCHR$EOFCHR$EOF^ &CALLCALLELSECALLCHR$CALLCHR$CHR$^q<0x20><0x52>94<0x1747b2e>4<0x1747b30><0x1747b31>R~4&Hd0d~NEXTNEXTLETLINEWEND<0x20><0x20>CALLLENCHR$ELSEEOFCALLEOF^ <0x1747b49>CHR$tEOFuCHR$CVI<0x7d>CHR$ELSEIFR47<0x1747b58><0x1747b59><0x1747b5a>!Q~<0x1747b5e><0x1747b5f>20893LINELINE<0x20>EOFCALLCVIELSE_EOF<0x20>CHR$<0x20><0x20>EOF^ &H83a0EOFCVIELSECALL<0x20>CALL^qWRITE<0x52>R<0x7e><0x1747b82>2!<0x1747b85>~IF<0x1747b88>4WRITEELSEIFWENDWRITENEXT<0x20>SQRELSE<0x20>EOFCVIEOFCALLCHR$<0x7e><0x20>^ 33631 CALLCHR$CHR$uRCVI<0x52>94<0x1747bdb>4<0x1747bdd><0x1747bde>5H<0x1747be1><0x1747be2>RWENDLETLINEELSECALLELSE<0x1747bea>ELSECHR$ELSE<0x20>ELSE<0x7e>CHR$varffffa08f^ &<0x20>ELSELENCHR$<0x20><0x20>ABSELSECALLq<0x20><0x52>3085CHR$4<0x1747c09>4<0x1747c0b><0x1747c0c><0x1747c0d><0x1747c0e>SGNSPACE$NEXT<0x3b>LINESQR<0x20><0x20>LINE<0x20>EOFCALLELSEEOFCALL<0x20>^ &CALLCHR$CHR$uCDBLuCHR$aCVIaCVI<0x52>q<0x1747c2f><0x1747c30>WRITE~4G4<0x1747c36><0x1747c37>4INPUTNEXTCHR$SQRELSECHR$<0x20>ELSEELSECALLELSE CHR$EOF<0x7c> IMP 142CHR$EOFCHR$EOFCALLCVIEOFCALLELSEuCHR$CHR$RCDBLWRITE<0x7e>EOF2CDBLCDBLEOFEOF<0x20>EOFCHR$EOFCHR$CHR$CALLCVIEOFCVIEOF<0x20><0x20>EOF<0x20>EOF^ 1CHR$ELSECHR$CALLEOFCHR$EOFCALLCHR$CHR$CALLCHR$CHR$CVI<0x20>CALLELSELINE<0x20><0x7e>WEND<0x1747cb8>WRITEWEND<0x20><0x20>LINECALLCHR$CALLCHR$<0x20>CHR$CHR$CVIELSECHR$CALL<0x20>^ labelffff8583<0x20>1.09019e-314<0x20><0x20>CALLEOFCALLELSE<0x20>CHR$CHR$CVIELSEu<0x20>CALLCALLCHR$CALL<0x20><0x20>CALLELSE<0x20>CALLCALL<0x7e><0x20> CHR$^ <0x7e>CHR$CHR$ CALLEOF<0x7e>CHR$1CVICHR$CALLCHR$CALLuCHR$CALLCHR$CALL<0x20>ELSECALLCHR$CALLCHR$CHR$CVIEOF<0x7d>CHR$ <0x20>^ 0CALLCALLEOFCALLEOFCALLCHR$CHR$_EOFut<0x20>CALLCHR$ASCCVICVI3CHR$CHR$CVICHR$CALLCHR$<0x20>CVICHR$u<0x20>CVICVI<0x20>CVIELSECALLCHR$CALLCALLEOF^ &H8385CALLCALLCHR$CALLCVICALLCALLCHR$CALLEOFCALL<0x7e>CHR$5EOFCALLCALLELSECHR$ELSECALLELSE<0x20>CALLCHR$uABS_CALL<0x20>uELSE<0x20>CHR$<0x20>CALL<0x20><0x89,0x00>